home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PsL Monthly 1993 December
/
PSL Monthly Shareware CD-ROM (December 1993).iso
/
prgmming
/
dos
/
c
/
tegl_c.exe
/
lha
/
SAMPROGS.ZIP
/
EASYTST1.C
< prev
next >
Wrap
Text File
|
1990-05-13
|
872b
|
42 lines
#include "teglsys.h"
unsigned easyquit(imagestkptr frame,msclickptr mouseclickpos)
{
if (getyesno(250,150,"Are you sure"))
abort_msg("Bye....");
return 1;
}
unsigned easyerror(imagestkptr frame,msclickptr mouseclickpos)
{
errmess(250,150,"Fake error occured in Programmer");
return 1;
}
unsigned easymessage(imagestkptr frame,msclickptr mouseclickpos)
{
framefromicon(frame,mouseclickpos,150,150,250,250);
prepareforupdate(stackptr);
frametext(stackptr,1,2,"First Line");
frametext(stackptr,2,2,"Second Line");
frametext(stackptr,3,2,"Third Line");
commitupdate();
return 1;
}
void main()
{
easytegl();
activebutton(100,100,"QUIT",easyquit);
activebutton(150,100,"ERROR",easyerror);
activebutton(220,100,"MESSAGE",easymessage);
teglsupervisor();
}